home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / dev / misc / DReg.lha / DReg / reggfx.s < prev    next >
Text File  |  1994-12-05  |  37KB  |  1,273 lines
  1.  
  2.                 even
  3.  
  4. ****************************************************************************
  5.  
  6.                 section     brdrdata,DATA
  7.  
  8. ****************************************************************************
  9. *
  10. *           The coordinates data
  11.  
  12.  
  13. Bitacoor:       dc.w    0,8, 0,0, 8,0
  14. Bitbcoor:       dc.w    1,1, 1,7, 0,8, 8,8, 8,1
  15. Bitccoor:       dc.w    2,1, 2,7
  16. Bitxcoor:       dc.w    9,0, 9,8
  17.  
  18. Backcoor:       dc.w    2,1, 80,1, 80,7, 2,7, 2,2, 79,2, 79,6, 3,6, 3,3
  19.                 dc.w    78,3, 78,5, 4,5, 4,4, 77,4
  20. Decacoor:       dc.w    0,7, 0,0, 1,1, 1,0, 80,0
  21. Decbcoor:       dc.w    1,2, 1,7, 0,8, 81,8, 81,0
  22.  
  23. OSacoor:        dc.w    0,0, 0,8, 1,7, 1,0, 16,0
  24. OSbcoor:        dc.w    1,8, 16,8, 16,0, 15,1, 15,7
  25.  
  26. RSacoor:        dc.w    0,0, 0,8, 1,7, 1,0, 15,0
  27. RSbcoor:        dc.w    1,8, 15,8, 15,0, 14,1, 14,7
  28.  
  29. Opacoor:        dc.w    0,2, 0,6, 1,7, 1,1, 2,1, 2,0, 28,0, 29,1
  30. Opbcoor:        dc.w    2,7, 2,8, 29,8, 29,7, 30,7, 30,1, 31,6, 31,2, 29,0
  31. Opccoor:        dc.w    3,8, 2,8, 2,7, 1,7, 1,2, 0,6, 0,2, 1,1, 2,1, 2,0
  32.                 dc.w    29,0, 29,1
  33. Opdcoor:        dc.w    4,8, 29,8, 29,7, 30,7, 30,1, 31,2, 31,6
  34.  
  35. *Icfcoor:        dc.w    14,1, 20,1, 20,2, 14,2
  36. *Icecoor:        dc.w    4,4, 4,8, 20,8, 20,4, 4,4
  37. *Icdcoor:        dc.w    23,0, 23,9
  38. *Icbcoor:        dc.w    1,0, 1,9
  39. *Icacoor:        dc.w    0,0, 0,9
  40.                 even
  41.  
  42. ****************************************************************************
  43.  
  44.                 section     brdrtext,DATA
  45.  
  46. ****************************************************************************
  47. *
  48. *           The window, hex, flags and decimal displays' borders
  49. *                                               - 79 struct, add 16
  50.  
  51.  
  52. BordrHexpx:     dc.w    73,0                bd_LeftEdge, bd_TopEdge
  53.                 dc.b    0,0                 bd_FrontPen, bd_BackPen
  54.                 dc.b    RP_JAM1             bd_DrawMode
  55.                 dc.b    2                   bd_Count
  56.                 dc.l    Bitccoor            bd_XY
  57.                 dc.l    0                   bd_NextBorder
  58.  
  59. BordrHexp:      dc.w    73,0
  60.                 dc.b    3,0
  61.                 dc.b    RP_JAM1
  62.                 dc.b    5
  63.                 dc.l    Bitbcoor
  64.                 dc.l    BordrHexpx
  65.  
  66. BordrHexo:      dc.w    73,0
  67.                 dc.b    1,0
  68.                 dc.b    RP_JAM1
  69.                 dc.b    3
  70.                 dc.l    Bitacoor
  71.                 dc.l    BordrHexp
  72.  
  73. BordrHexny:     dc.w    63,0
  74.                 dc.b    2,0
  75.                 dc.b    RP_JAM1
  76.                 dc.b    2
  77.                 dc.l    Bitxcoor
  78.                 dc.l    BordrHexo
  79.  
  80. BordrHexnx:     dc.w    63,0
  81.                 dc.b    0,0
  82.                 dc.b    RP_JAM1
  83.                 dc.b    2
  84.                 dc.l    Bitccoor
  85.                 dc.l    BordrHexny
  86.  
  87. BordrHexn:      dc.w    63,0
  88.                 dc.b    3,0
  89.                 dc.b    RP_JAM1
  90.                 dc.b    5
  91.                 dc.l    Bitbcoor
  92.                 dc.l    BordrHexnx
  93.  
  94. BordrHexm:      dc.w    63,0
  95.                 dc.b    1,0
  96.                 dc.b    RP_JAM1
  97.                 dc.b    3
  98.                 dc.l    Bitacoor
  99.                 dc.l    BordrHexn
  100.  
  101. BordrHexly:     dc.w    53,0
  102.                 dc.b    2,0
  103.                 dc.b    RP_JAM1
  104.                 dc.b    2
  105.                 dc.l    Bitxcoor
  106.                 dc.l    BordrHexm
  107.  
  108. BordrHexlx:     dc.w    53,0
  109.                 dc.b    0,0
  110.                 dc.b    RP_JAM1
  111.                 dc.b    2
  112.                 dc.l    Bitccoor
  113.                 dc.l    BordrHexly
  114.  
  115. BordrHexl:      dc.w    53,0
  116.                 dc.b    3,0
  117.                 dc.b    RP_JAM1
  118.                 dc.b    5
  119.                 dc.l    Bitbcoor
  120.                 dc.l    BordrHexlx
  121. * 10
  122.  
  123. BordrHexk:      dc.w    53,0
  124.                 dc.b    1,0
  125.                 dc.b    RP_JAM1
  126.                 dc.b    3
  127.                 dc.l    Bitacoor
  128.                 dc.l    BordrHexl
  129.  
  130. BordrHexjy:     dc.w    43,0
  131.                 dc.b    2,0
  132.                 dc.b    RP_JAM1
  133.                 dc.b    2
  134.                 dc.l    Bitxcoor
  135.                 dc.l    BordrHexk
  136.  
  137. BordrHexjx:     dc.w    43,0
  138.                 dc.b    0,0
  139.                 dc.b    RP_JAM1
  140.                 dc.b    2
  141.                 dc.l    Bitccoor
  142.                 dc.l    BordrHexjy
  143.  
  144. BordrHexj:      dc.w    43,0
  145.                 dc.b    3,0
  146.                 dc.b    RP_JAM1
  147.                 dc.b    5
  148.                 dc.l    Bitbcoor
  149.                 dc.l    BordrHexjx
  150.  
  151. BordrHexi:      dc.w    43,0
  152.                 dc.b    1,0
  153.                 dc.b    RP_JAM1
  154.                 dc.b    3
  155.                 dc.l    Bitacoor
  156.                 dc.l    BordrHexj
  157.  
  158. *           half a longword
  159.  
  160. BordrHexhw:     dc.w    33,0
  161.                 dc.b    2,0
  162.                 dc.b    RP_JAM1
  163.                 dc.b    2
  164.                 dc.l    Bitxcoor
  165.                 dc.l    BordrHexi
  166.  
  167. BordrHexhv:     dc.w    32,0
  168.                 dc.b    2,0
  169.                 dc.b    RP_JAM1
  170.                 dc.b    2
  171.                 dc.l    Bitxcoor
  172.                 dc.l    BordrHexhw
  173.  
  174. BordrHexhz:     dc.w    31,0
  175.                 dc.b    2,0
  176.                 dc.b    RP_JAM1
  177.                 dc.b    2
  178.                 dc.l    Bitxcoor
  179.                 dc.l    BordrHexhv
  180.  
  181. BordrHexhy:     dc.w    30,0
  182.                 dc.b    2,0
  183.                 dc.b    RP_JAM1
  184.                 dc.b    2
  185.                 dc.l    Bitxcoor
  186.                 dc.l    BordrHexhz
  187.  
  188. BordrHexhx:     dc.w    30,0
  189.                 dc.b    0,0
  190.                 dc.b    RP_JAM1
  191.                 dc.b    2
  192.                 dc.l    Bitccoor
  193.                 dc.l    BordrHexhy
  194. * 20
  195.  
  196. BordrHexh:      dc.w    30,0
  197.                 dc.b    3,0
  198.                 dc.b    RP_JAM1
  199.                 dc.b    5
  200.                 dc.l    Bitbcoor
  201.                 dc.l    BordrHexhx
  202.  
  203. BordrHexg:      dc.w    30,0
  204.                 dc.b    1,0
  205.                 dc.b    RP_JAM1
  206.                 dc.b    3
  207.                 dc.l    Bitacoor
  208.                 dc.l    BordrHexh
  209.  
  210. BordrHexfy:     dc.w    20,0
  211.                 dc.b    2,0
  212.                 dc.b    RP_JAM1
  213.                 dc.b    2
  214.                 dc.l    Bitxcoor
  215.                 dc.l    BordrHexg
  216.  
  217. BordrHexfx:     dc.w    20,0
  218.                 dc.b    0,0
  219.                 dc.b    RP_JAM1
  220.                 dc.b    2
  221.                 dc.l    Bitccoor
  222.                 dc.l    BordrHexfy
  223.  
  224. BordrHexf:      dc.w    20,0
  225.                 dc.b    3,0
  226.                 dc.b    RP_JAM1
  227.                 dc.b    5
  228.                 dc.l    Bitbcoor
  229.                 dc.l    BordrHexfx
  230.  
  231. BordrHexe:      dc.w    20,0
  232.                 dc.b    1,0
  233.                 dc.b    RP_JAM1
  234.                 dc.b    3
  235.                 dc.l    Bitacoor
  236.                 dc.l    BordrHexf
  237.  
  238. BordrHexdy:     dc.w    10,0
  239.                 dc.b    2,0
  240.                 dc.b    RP_JAM1
  241.                 dc.b    2
  242.                 dc.l    Bitxcoor
  243.                 dc.l    BordrHexe
  244.  
  245. BordrHexdx:     dc.w    10,0
  246.                 dc.b    0,0
  247.                 dc.b    RP_JAM1
  248.                 dc.b    2
  249.                 dc.l    Bitccoor
  250.                 dc.l    BordrHexdy
  251.  
  252. BordrHexd:      dc.w    10,0
  253.                 dc.b    3,0
  254.                 dc.b    RP_JAM1
  255.                 dc.b    5
  256.                 dc.l    Bitbcoor
  257.                 dc.l    BordrHexdx
  258.  
  259. BordrHexc:      dc.w    10,0
  260.                 dc.b    1,0
  261.                 dc.b    RP_JAM1
  262.                 dc.b    3
  263.                 dc.l    Bitacoor
  264.                 dc.l    BordrHexd
  265. * 30
  266.  
  267. BordrHexby:     dc.w    0,0
  268.                 dc.b    2,0
  269.                 dc.b    RP_JAM1
  270.                 dc.b    2
  271.                 dc.l    Bitxcoor
  272.                 dc.l    BordrHexc
  273.  
  274. BordrHexbx:     dc.w    0,0
  275.                 dc.b    0,0
  276.                 dc.b    RP_JAM1
  277.                 dc.b    2
  278.                 dc.l    Bitccoor
  279.                 dc.l    BordrHexby
  280.  
  281. BordrHexb:      dc.w    0,0
  282.                 dc.b    3,0
  283.                 dc.b    RP_JAM1
  284.                 dc.b    5
  285.                 dc.l    Bitbcoor
  286.                 dc.l    BordrHexbx
  287.  
  288. BordrHexa:      dc.w    0,0
  289.                 dc.b    1,0
  290.                 dc.b    RP_JAM1
  291.                 dc.b    3
  292.                 dc.l    Bitacoor
  293.                 dc.l    BordrHexb
  294.  
  295.  
  296. *           The Status Bits' borders
  297.  
  298.  
  299. BordFilli:      dc.w    40,0
  300.                 dc.b    0,0
  301.                 dc.b    RP_JAM1
  302.                 dc.b    2
  303.                 dc.l    Bitccoor
  304.                 dc.l    0
  305.  
  306. BordFillg:      dc.w    30,0
  307.                 dc.b    0,0
  308.                 dc.b    RP_JAM1
  309.                 dc.b    2
  310.                 dc.l    Bitccoor
  311.                 dc.l    BordFilli
  312.  
  313. BordFille:      dc.w    20,0
  314.                 dc.b    0,0
  315.                 dc.b    RP_JAM1
  316.                 dc.b    2
  317.                 dc.l    Bitccoor
  318.                 dc.l    BordFillg
  319.  
  320. BordFillc:      dc.w    10,0
  321.                 dc.b    0,0
  322.                 dc.b    RP_JAM1
  323.                 dc.b    2
  324.                 dc.l    Bitccoor
  325.                 dc.l    BordFille
  326.  
  327. BordFilla:      dc.w    0,0
  328.                 dc.b    0,0
  329.                 dc.b    RP_JAM1
  330.                 dc.b    2
  331.                 dc.l    Bitccoor
  332.                 dc.l    BordFillc
  333.  
  334. BordrFlgj:      dc.w    40,0
  335.                 dc.b    3,0
  336.                 dc.b    RP_JAM1
  337.                 dc.b    5
  338.                 dc.l    Bitbcoor
  339.                 dc.l    BordFilla
  340. * 40
  341.  
  342. BordrFlgi:      dc.w    40,0
  343.                 dc.b    1,0
  344.                 dc.b    RP_JAM1
  345.                 dc.b    3
  346.                 dc.l    Bitacoor
  347.                 dc.l    BordrFlgj
  348.  
  349. BordrFlgh:      dc.w    30,0
  350.                 dc.b    3,0
  351.                 dc.b    RP_JAM1
  352.                 dc.b    5
  353.                 dc.l    Bitbcoor
  354.                 dc.l    BordrFlgi
  355.  
  356. BordrFlgg:      dc.w    30,0
  357.                 dc.b    1,0
  358.                 dc.b    RP_JAM1
  359.                 dc.b    3
  360.                 dc.l    Bitacoor
  361.                 dc.l    BordrFlgh
  362.  
  363. BordrFlgf:      dc.w    20,0
  364.                 dc.b    3,0
  365.                 dc.b    RP_JAM1
  366.                 dc.b    5
  367.                 dc.l    Bitbcoor
  368.                 dc.l    BordrFlgg
  369.  
  370. BordrFlge:      dc.w    20,0
  371.                 dc.b    1,0
  372.                 dc.b    RP_JAM1
  373.                 dc.b    3
  374.                 dc.l    Bitacoor
  375.                 dc.l    BordrFlgf
  376.  
  377. BordrFlgd:      dc.w    10,0
  378.                 dc.b    3,0
  379.                 dc.b    RP_JAM1
  380.                 dc.b    5
  381.                 dc.l    Bitbcoor
  382.                 dc.l    BordrFlge
  383.  
  384. BordrFlgc:      dc.w    10,0
  385.                 dc.b    1,0
  386.                 dc.b    RP_JAM1
  387.                 dc.b    3
  388.                 dc.l    Bitacoor
  389.                 dc.l    BordrFlgd
  390.  
  391. BordrFlgb:      dc.w    0,0
  392.                 dc.b    3,0
  393.                 dc.b    RP_JAM1
  394.                 dc.b    5
  395.                 dc.l    Bitbcoor
  396.                 dc.l    BordrFlgc
  397.  
  398. BordrFlga:      dc.w    0,0
  399.                 dc.b    1,0
  400.                 dc.b    RP_JAM1
  401.                 dc.b    3
  402.                 dc.l    Bitacoor
  403.                 dc.l    BordrFlgb
  404.  
  405.  
  406. *           The bit display borders
  407.  
  408.  
  409. BordBit0c:      dc.w    0,0                 bd_LeftEdge, bd_TopEdge
  410.                 dc.b    0,0
  411.                 dc.b    RP_JAM1
  412.                 dc.b    2
  413.                 dc.l    Bitccoor
  414.                 dc.l    0
  415. * 50
  416.  
  417. BordBit0b:      dc.w    0,0
  418.                 dc.b    3,0
  419.                 dc.b    RP_JAM1
  420.                 dc.b    5
  421.                 dc.l    Bitbcoor
  422.                 dc.l    BordBit0c
  423.  
  424. BordBit0a:      dc.w    0,0
  425.                 dc.b    1,0
  426.                 dc.b    RP_JAM1
  427.                 dc.b    3
  428.                 dc.l    Bitacoor
  429.                 dc.l    BordBit0b
  430.  
  431.  
  432. *           The decimal display border
  433.  
  434.  
  435. BordDecDb:      dc.w    0,0                 bd_LeftEdge, bd_TopEdge
  436.                 dc.b    3,0
  437.                 dc.b    RP_JAM1
  438.                 dc.b    5
  439.                 dc.l    Decbcoor
  440.                 dc.l    0
  441.  
  442. BordDecDa:      dc.w    0,0
  443.                 dc.b    1,0
  444.                 dc.b    RP_JAM1
  445.                 dc.b    5
  446.                 dc.l    Decacoor
  447.                 dc.l    BordDecDb
  448.  
  449. BordDBack:      dc.w    0,0
  450.                 dc.b    0,0
  451.                 dc.b    RP_JAM1
  452.                 dc.b    14
  453.                 dc.l    Backcoor
  454.                 dc.l    BordDecDa
  455.  
  456.  
  457. *           Gadget Border structures
  458.  
  459.  
  460. BordrOpSzd:     dc.w    0,0                 bd_LeftEdge, bd_TopEdge
  461.                 dc.b    1,0                 bd_FrontPen, bd_BackPen
  462.                 dc.b    RP_JAM1             bd_DrawMode
  463.                 dc.b    5                   bd_Count
  464.                 dc.l    OSbcoor             bd_XY
  465.                 dc.l    0                   bd_NextBorder
  466.  
  467. BordrOpSzc:     dc.w    0,0
  468.                 dc.b    0,0
  469.                 dc.b    RP_JAM1
  470.                 dc.b    5
  471.                 dc.l    OSacoor
  472.                 dc.l    BordrOpSzd          bd_NextBorder
  473.  
  474. BordrOpSzb:     dc.w    0,0
  475.                 dc.b    0,0
  476.                 dc.b    RP_JAM1
  477.                 dc.b    5
  478.                 dc.l    OSbcoor
  479.                 dc.l    0
  480.  
  481. BordrOpSza:     dc.w    0,0
  482.                 dc.b    1,0
  483.                 dc.b    RP_JAM1
  484.                 dc.b    5
  485.                 dc.l    OSacoor
  486.                 dc.l    BordrOpSzb
  487.  
  488. BordrRegd:      dc.w    0,0
  489.                 dc.b    1,0
  490.                 dc.b    RP_JAM1
  491.                 dc.b    5
  492.                 dc.l    RSbcoor
  493.                 dc.l    0
  494. * 60
  495.  
  496. BordrRegc:      dc.w    0,0
  497.                 dc.b    0,0
  498.                 dc.b    RP_JAM1
  499.                 dc.b    5
  500.                 dc.l    RSacoor
  501.                 dc.l    BordrRegd
  502.  
  503. BordrRegb:      dc.w    0,0
  504.                 dc.b    0,0
  505.                 dc.b    RP_JAM1
  506.                 dc.b    5
  507.                 dc.l    RSbcoor
  508.                 dc.l    0
  509.  
  510. BordrRega:      dc.w    0,0
  511.                 dc.b    1,0
  512.                 dc.b    RP_JAM1
  513.                 dc.b    5
  514.                 dc.l    RSacoor
  515.                 dc.l    BordrRegb
  516.  
  517. BordrOpd:       dc.w    0,0
  518.                 dc.b    1,0
  519.                 dc.b    RP_JAM1
  520.                 dc.b    7
  521.                 dc.l    Opdcoor
  522.                 dc.l    0
  523.  
  524. BordrOpc:       dc.w    0,0
  525.                 dc.b    0,0
  526.                 dc.b    RP_JAM1
  527.                 dc.b    12
  528.                 dc.l    Opccoor
  529.                 dc.l    BordrOpd
  530.  
  531. BordrOpb:       dc.w    0,0
  532.                 dc.b    0,0
  533.                 dc.b    RP_JAM1
  534.                 dc.b    9
  535.                 dc.l    Opbcoor
  536.                 dc.l    0
  537.  
  538. BordrOpa:       dc.w    0,0
  539.                 dc.b    1,0
  540.                 dc.b    RP_JAM1
  541.                 dc.b    8
  542.                 dc.l    Opacoor
  543.                 dc.l    BordrOpb
  544.  
  545. BoEnd:          dc.w    0
  546.                 even
  547.  
  548. bordbytes:      equ     BoEnd-BordrHexpx
  549. BsLen:          equ     BoEnd-BordrOpa
  550. nrBs:           equ     bordbytes/BsLen
  551.  
  552.  
  553. ****************************************************************************
  554.  
  555.                 section     intuidata,DATA
  556.  
  557. ****************************************************************************
  558. *
  559. *           Gadget and other text strings
  560.  
  561.  
  562. FormLSign:      dc.b    '%15ld',0           signed decimal long
  563. FormISign:      dc.b    '%15d',0,0          signed decimal int
  564.  
  565. TxtLng:         dc.b    '.L',0,0
  566. TxtWrd:         dc.b    '.W',0,0
  567. TxtByt:         dc.b    '.B',0,0
  568.  
  569. TxtRd0:         dc.b    'D0',0,0
  570. TxtRd1:         dc.b    'D1',0,0
  571. TxtRd2:         dc.b    'D2',0,0
  572. TxtRd3:         dc.b    'D3',0,0
  573.  
  574. flagsdispx:     dc.b    '0',0
  575. flagsdispn:     dc.b    '0',0
  576. flagsdispz:     dc.b    '0',0
  577. flagsdispv:     dc.b    '0',0
  578. flagsdispc:     dc.b    '0',0
  579.  
  580. srchexdn1:      dc.b    '0',0               these are going right...
  581. srchexdn2:      dc.b    '0',0
  582. srchexdn3:      dc.b    '0',0
  583. srchexdn4:      dc.b    '0',0
  584. srchexdn5:      dc.b    '0',0
  585. srchexdn6:      dc.b    '0',0
  586. srchexdn7:      dc.b    '0',0
  587. srchexdn8:      dc.b    '0',0                           ...to left
  588.  
  589.                 dc.b    '000000000000000',0     RawDoFmt into here,
  590. sdecstring:     dc.b    '              0',0         then dots into here
  591.  
  592. dsthexdn1:      dc.b    '0',0
  593. dsthexdn2:      dc.b    '0',0
  594. dsthexdn3:      dc.b    '0',0
  595. dsthexdn4:      dc.b    '0',0
  596. dsthexdn5:      dc.b    '0',0
  597. dsthexdn6:      dc.b    '0',0
  598. dsthexdn7:      dc.b    '0',0
  599. dsthexdn8:      dc.b    '0',0
  600.  
  601.                 dc.b    '000000000000000',0
  602. ddecstring:     dc.b    '              0',0
  603.  
  604.  
  605. TxtCLR:         dc.b    'CLR',0
  606. TxtNEG:         dc.b    'NEG',0
  607. TxtNOT:         dc.b    'NOT',0
  608. TxtAND:         dc.b    'AND',0
  609. TxtOR:          dc.b    'OR',0,0
  610. TxtEOR:         dc.b    'EOR',0
  611. TxtLSL:         dc.b    'LSL',0
  612. TxtROL:         dc.b    'ROL',0
  613. TxtROXL:        dc.b    'ROXL',0,0
  614. TxtLSR:         dc.b    'LSR',0
  615. TxtROR:         dc.b    'ROR',0
  616. TxtROXR:        dc.b    'ROXR',0,0
  617. TxtASL:         dc.b    'ASL',0
  618. TxtMULU:        dc.b    'MULU',0,0
  619. TxtMULS:        dc.b    'MULS',0,0
  620. TxtASR:         dc.b    'ASR',0
  621. TxtDIVU:        dc.b    'DIVU',0,0
  622. TxtDIVS:        dc.b    'DIVS',0,0
  623. TxtADD:         dc.b    'ADD',0
  624. TxtEXG:         dc.b    'EXG',0
  625. TxtMOVE:        dc.b    'MOVE',0,0
  626. TxtSUB:         dc.b    'SUB',0
  627. TxtSWAP:        dc.b    'SWAP',0,0
  628. TxtINPUT:       dc.b    'HEX',0
  629. TxtABOUT:       dc.b    'ABOUT',0
  630. TxtOKAY:        dc.b    'YEAH!',0
  631.  
  632. textstbit:      dc.b    "Status Bits:",0,0
  633. textxnzvc:      dc.b    "X N Z V C",0
  634. textphin:       dc.b    "DReg v1.2 - ~} 1994, P.Juhasz",0
  635.                 even
  636. aboutlin1:      dc.b    "DReg v1.2 is Copyright ~} 94 of Paul Juhasz, "
  637.                 dc.b    " 28 Ellora Rd,",0
  638. aboutlin2:      dc.b    " Streatham",0
  639. aboutlin3:      dc.b    " London SW16 6JF",0
  640. aboutlin4:      dc.b    "This program is Freeware. Permission is hereby "
  641.                 dc.b    "given to any individual to copy",0
  642. aboutlin5:      dc.b    "and distribute it as long as no fee is charged "
  643.                 dc.b    "for the program itself.",0
  644. aboutlin6:      dc.b    "If you like it - spread it, if you don't - wipe"
  645.                 dc.b    " it from your disk.",0
  646.                 even
  647.  
  648. ****************************************************************************
  649.  
  650.                 section     intuitext,DATA
  651.  
  652. ****************************************************************************
  653. *
  654. *           Gadget and other text structures    - 66 structures, add 20
  655.  
  656.                 even
  657.  
  658. ITxtLng:        dc.b    1                   BYTE    it_FrontPen
  659.                 dc.b    2                   BYTE    it_BackPen
  660.                 dc.b    RP_JAM2             BYTE    it_DrawMode
  661.                 dc.b    0                   BYTE    it_KludgeFill00
  662.                 dc.w    3                   WORD    it_LeftEdge
  663.                 dc.w    1                   WORD    it_TopEdge
  664.                 dc.l    RegFntTA            APTR    it_ITextFont
  665.                 dc.l    TxtLng              APTR    it_IText
  666.                 dc.l    0                   APTR    it_NextText
  667.  
  668. ITxtWrd:        dc.b    1,2,RP_JAM2,0
  669.                 dc.w    2,1
  670.                 dc.l    RegFntTA
  671.                 dc.l    TxtWrd
  672.                 dc.l    0
  673.  
  674. ITxtByt:        dc.b    1,2,RP_JAM2,0
  675.                 dc.w    3,1
  676.                 dc.l    RegFntTA
  677.                 dc.l    TxtByt
  678.                 dc.l    0
  679.  
  680. ITxtSSel:       dc.b    1,2,RP_JAM2,0
  681.                 dc.w    4,1
  682.                 dc.l    RegFntTA
  683.                 dc.l    TxtRd0
  684.                 dc.l    0
  685.  
  686. ITxtDSel:       dc.b    1,2,RP_JAM2,0
  687.                 dc.w    4,1
  688.                 dc.l    RegFntTA
  689.                 dc.l    TxtRd1
  690.                 dc.l    0
  691.  
  692.  
  693. *           the Status Bits plus decimal and hexadecimal display values
  694.  
  695.  
  696. ITxtFlgc:       dc.b    1,0,RP_JAM2,0
  697.                 dc.w    76
  698.                 dc.w    25
  699.                 dc.l    RegFntTA
  700.                 dc.l    flagsdispc
  701.                 dc.l    0
  702.  
  703. ITxtFlgv:       dc.b    1,0,RP_JAM2,0
  704.                 dc.w    66
  705.                 dc.w    25
  706.                 dc.l    RegFntTA
  707.                 dc.l    flagsdispv
  708.                 dc.l    ITxtFlgc
  709.  
  710. ITxtFlgz:       dc.b    1,0,RP_JAM2,0
  711.                 dc.w    56
  712.                 dc.w    25
  713.                 dc.l    RegFntTA
  714.                 dc.l    flagsdispz
  715.                 dc.l    ITxtFlgv
  716.  
  717. ITxtFlgn:       dc.b    1,0,RP_JAM2,0
  718.                 dc.w    46
  719.                 dc.w    25
  720.                 dc.l    RegFntTA
  721.                 dc.l    flagsdispn
  722.                 dc.l    ITxtFlgz
  723.  
  724. ITxtFlgx:       dc.b    1,0,RP_JAM2,0
  725.                 dc.w    36
  726.                 dc.w    25
  727.                 dc.l    RegFntTA
  728.                 dc.l    flagsdispx
  729.                 dc.l    ITxtFlgn
  730. * 10
  731.  
  732. *           The Register values in HEX
  733.  
  734.  
  735. ITxDNib7:       dc.b    1,0,RP_JAM2,0
  736.                 dc.w    76
  737.                 dc.w    13
  738.                 dc.l    RegFntTA
  739.                 dc.l    dsthexdn1
  740.                 dc.l    0
  741.  
  742. ITxDNib6:       dc.b    1,0,RP_JAM2,0
  743.                 dc.w    66
  744.                 dc.w    13
  745.                 dc.l    RegFntTA
  746.                 dc.l    dsthexdn2
  747.                 dc.l    ITxDNib7
  748.  
  749. ITxDNib5:       dc.b    1,0,RP_JAM2,0
  750.                 dc.w    56
  751.                 dc.w    13
  752.                 dc.l    RegFntTA
  753.                 dc.l    dsthexdn3
  754.                 dc.l    ITxDNib6
  755.  
  756. ITxDNib4:       dc.b    1,0,RP_JAM2,0
  757.                 dc.w    46
  758.                 dc.w    13
  759.                 dc.l    RegFntTA
  760.                 dc.l    dsthexdn4
  761.                 dc.l    ITxDNib5
  762.  
  763. ITxDNib3:       dc.b    1,0,RP_JAM2,0
  764.                 dc.w    33
  765.                 dc.w    13
  766.                 dc.l    RegFntTA
  767.                 dc.l    dsthexdn5
  768.                 dc.l    ITxDNib4
  769.  
  770. ITxDNib2:       dc.b    1,0,RP_JAM2,0
  771.                 dc.w    23
  772.                 dc.w    13
  773.                 dc.l    RegFntTA
  774.                 dc.l    dsthexdn6
  775.                 dc.l    ITxDNib3
  776.  
  777. ITxDNib1:       dc.b    1,0,RP_JAM2,0
  778.                 dc.w    13
  779.                 dc.w    13
  780.                 dc.l    RegFntTA
  781.                 dc.l    dsthexdn7
  782.                 dc.l    ITxDNib2
  783.  
  784. ITxDNib0:       dc.b    1,0,RP_JAM2,0
  785.                 dc.w    3
  786.                 dc.w    13
  787.                 dc.l    RegFntTA
  788.                 dc.l    dsthexdn8
  789.                 dc.l    ITxDNib1
  790.  
  791.  
  792. ITxSNib7:       dc.b    1,0,RP_JAM2,0
  793.                 dc.w    76
  794.                 dc.w    1
  795.                 dc.l    RegFntTA
  796.                 dc.l    srchexdn1
  797.                 dc.l    ITxDNib0
  798.  
  799. ITxSNib6:       dc.b    1,0,RP_JAM2,0
  800.                 dc.w    66
  801.                 dc.w    1
  802.                 dc.l    RegFntTA
  803.                 dc.l    srchexdn2
  804.                 dc.l    ITxSNib7
  805. * 20
  806.  
  807. ITxSNib5:       dc.b    1,0,RP_JAM2,0
  808.                 dc.w    56
  809.                 dc.w    1
  810.                 dc.l    RegFntTA
  811.                 dc.l    srchexdn3
  812.                 dc.l    ITxSNib6
  813.  
  814. ITxSNib4:       dc.b    1,0,RP_JAM2,0
  815.                 dc.w    46
  816.                 dc.w    1
  817.                 dc.l    RegFntTA
  818.                 dc.l    srchexdn4
  819.                 dc.l    ITxSNib5
  820.  
  821. ITxSNib3:       dc.b    1,0,RP_JAM2,0
  822.                 dc.w    33
  823.                 dc.w    1
  824.                 dc.l    RegFntTA
  825.                 dc.l    srchexdn5
  826.                 dc.l    ITxSNib4
  827.  
  828. ITxSNib2:       dc.b    1,0,RP_JAM2,0
  829.                 dc.w    23
  830.                 dc.w    1
  831.                 dc.l    RegFntTA
  832.                 dc.l    srchexdn6
  833.                 dc.l    ITxSNib3
  834.  
  835. ITxSNib1:       dc.b    1,0,RP_JAM2,0
  836.                 dc.w    13
  837.                 dc.w    1
  838.                 dc.l    RegFntTA
  839.                 dc.l    srchexdn7
  840.                 dc.l    ITxSNib2
  841.  
  842. ITxSNib0:       dc.b    1,0,RP_JAM2,0
  843.                 dc.w    3
  844.                 dc.w    1
  845.                 dc.l    RegFntTA
  846.                 dc.l    srchexdn8
  847.                 dc.l    ITxSNib1
  848.  
  849.  
  850. *           and register values in decimal
  851.  
  852.  
  853. ITxtDDec:       dc.b    1,0,RP_JAM2,0
  854.                 dc.w    5
  855.                 dc.w    13
  856.                 dc.l    RegFntTA
  857.                 dc.l    ddecstring
  858.                 dc.l    0
  859.  
  860. ITxtSDec:       dc.b    1,0,RP_JAM2,0
  861.                 dc.w    5
  862.                 dc.w    1
  863.                 dc.l    RegFntTA
  864.                 dc.l    sdecstring
  865.                 dc.l    ITxtDDec
  866.  
  867.  
  868. *           Gadget text structures for OpCode gadgets
  869.  
  870.  
  871. ITxtCLR:        dc.b    1,2,RP_JAM2,0
  872.                 dc.w    8
  873.                 dc.w    1
  874.                 dc.l    RegFntTA
  875.                 dc.l    TxtCLR
  876.                 dc.l    0
  877.  
  878. ITxtNEG:        dc.b    1,2,RP_JAM2,0
  879.                 dc.w    8
  880.                 dc.w    1
  881.                 dc.l    RegFntTA
  882.                 dc.l    TxtNEG
  883.                 dc.l    0
  884. * 30
  885.  
  886. ITxtNOT:        dc.b    1,2,RP_JAM2,0
  887.                 dc.w    8
  888.                 dc.w    1
  889.                 dc.l    RegFntTA
  890.                 dc.l    TxtNOT
  891.                 dc.l    0
  892.  
  893. ITxtAND:        dc.b    1,2,RP_JAM2,0
  894.                 dc.w    8
  895.                 dc.w    1
  896.                 dc.l    RegFntTA
  897.                 dc.l    TxtAND
  898.                 dc.l    0
  899.  
  900. ITxtOR:         dc.b    1,2,RP_JAM2,0
  901.                 dc.w    10
  902.                 dc.w    1
  903.                 dc.l    RegFntTA
  904.                 dc.l    TxtOR
  905.                 dc.l    0
  906.  
  907. ITxtEOR:        dc.b    1,2,RP_JAM2,0
  908.                 dc.w    8
  909.                 dc.w    1
  910.                 dc.l    RegFntTA
  911.                 dc.l    TxtEOR
  912.                 dc.l    0
  913.  
  914. ITxtLSL:        dc.b    1,2,RP_JAM2,0
  915.                 dc.w    8
  916.                 dc.w    1
  917.                 dc.l    RegFntTA
  918.                 dc.l    TxtLSL
  919.                 dc.l    0
  920.  
  921. ITxtROL:        dc.b    1,2,RP_JAM2,0
  922.                 dc.w    8
  923.                 dc.w    1
  924.                 dc.l    RegFntTA
  925.                 dc.l    TxtROL
  926.                 dc.l    0
  927.  
  928. ITxtROXL:       dc.b    1,2,RP_JAM2,0
  929.                 dc.w    6
  930.                 dc.w    1
  931.                 dc.l    RegFntTA
  932.                 dc.l    TxtROXL
  933.                 dc.l    0
  934.  
  935. ITxtLSR:        dc.b    1,2,RP_JAM2,0
  936.                 dc.w    8
  937.                 dc.w    1
  938.                 dc.l    RegFntTA
  939.                 dc.l    TxtLSR
  940.                 dc.l    0
  941.  
  942. ITxtROR:        dc.b    1,2,RP_JAM2,0
  943.                 dc.w    8
  944.                 dc.w    1
  945.                 dc.l    RegFntTA
  946.                 dc.l    TxtROR
  947.                 dc.l    0
  948.  
  949. ITxtROXR:       dc.b    1,2,RP_JAM2,0
  950.                 dc.w    6
  951.                 dc.w    1
  952.                 dc.l    RegFntTA
  953.                 dc.l    TxtROXR
  954.                 dc.l    0
  955. * 40
  956.  
  957. ITxtASL:        dc.b    1,2,RP_JAM2,0
  958.                 dc.w    8
  959.                 dc.w    1
  960.                 dc.l    RegFntTA
  961.                 dc.l    TxtASL
  962.                 dc.l    0
  963.  
  964. ITxtMULU:       dc.b    1,2,RP_JAM2,0
  965.                 dc.w    6
  966.                 dc.w    1
  967.                 dc.l    RegFntTA
  968.                 dc.l    TxtMULU
  969.                 dc.l    0
  970.  
  971. ITxtMULS:       dc.b    1,2,RP_JAM2,0
  972.                 dc.w    6
  973.                 dc.w    1
  974.                 dc.l    RegFntTA
  975.                 dc.l    TxtMULS
  976.                 dc.l    0
  977.  
  978. ITxtASR:        dc.b    1,2,RP_JAM2,0
  979.                 dc.w    8
  980.                 dc.w    1
  981.                 dc.l    RegFntTA
  982.                 dc.l    TxtASR
  983.                 dc.l    0
  984.  
  985. ITxtDIVU:       dc.b    1,2,RP_JAM2,0
  986.                 dc.w    6
  987.                 dc.w    1
  988.                 dc.l    RegFntTA
  989.                 dc.l    TxtDIVU
  990.                 dc.l    0
  991.  
  992. ITxtDIVS:       dc.b    1,2,RP_JAM2,0
  993.                 dc.w    6
  994.                 dc.w    1
  995.                 dc.l    RegFntTA
  996.                 dc.l    TxtDIVS
  997.                 dc.l    0
  998.  
  999. ITxtADD:        dc.b    1,2,RP_JAM2,0
  1000.                 dc.w    8
  1001.                 dc.w    1
  1002.                 dc.l    RegFntTA
  1003.                 dc.l    TxtADD
  1004.                 dc.l    0
  1005.  
  1006. ITxtEXG:        dc.b    1,2,RP_JAM2,0
  1007.                 dc.w    8
  1008.                 dc.w    1
  1009.                 dc.l    RegFntTA
  1010.                 dc.l    TxtEXG
  1011.                 dc.l    0
  1012.  
  1013. ITxtMOVE:       dc.b    1,2,RP_JAM2,0
  1014.                 dc.w    6
  1015.                 dc.w    1
  1016.                 dc.l    RegFntTA
  1017.                 dc.l    TxtMOVE
  1018.                 dc.l    0
  1019.  
  1020. ITxtSUB:        dc.b    1,2,RP_JAM2,0
  1021.                 dc.w    8
  1022.                 dc.w    1
  1023.                 dc.l    RegFntTA
  1024.                 dc.l    TxtSUB
  1025.                 dc.l    0
  1026. * 50
  1027.  
  1028. ITxtSWAP:       dc.b    1,2,RP_JAM2,0
  1029.                 dc.w    6
  1030.                 dc.w    1
  1031.                 dc.l    RegFntTA
  1032.                 dc.l    TxtSWAP
  1033.                 dc.l    0
  1034.  
  1035. ITxtINPUT:      dc.b    1,2,RP_JAM2,0
  1036.                 dc.w    8
  1037.                 dc.w    1
  1038.                 dc.l    RegFntTA
  1039.                 dc.l    TxtINPUT
  1040.                 dc.l    0
  1041.  
  1042. ITxtABOUT:      dc.b    1,2,RP_JAM2,0
  1043.                 dc.w    5
  1044.                 dc.w    1
  1045.                 dc.l    RegFntTA
  1046.                 dc.l    TxtABOUT
  1047.                 dc.l    0
  1048.  
  1049. ITxtOKAY:       dc.b    1,2,RP_JAM2,0
  1050.                 dc.w    4
  1051.                 dc.w    1
  1052.                 dc.l    RegFntTA
  1053.                 dc.l    TxtOKAY
  1054.                 dc.l    0
  1055.  
  1056.  
  1057. *           IText structures for panel
  1058.  
  1059.  
  1060. ITxtFPhin:      dc.b    1,0,RP_JAM1,0
  1061.                 dc.w    296
  1062.                 dc.w    62
  1063.                 dc.l    RegFntTA
  1064.                 dc.l    textphin
  1065.                 dc.l    0
  1066.  
  1067. ITxFxnzvc:      dc.b    1,0,RP_JAM1,0
  1068.                 dc.w    395
  1069.                 dc.w    48
  1070.                 dc.l    RegFntTA
  1071.                 dc.l    textxnzvc
  1072.                 dc.l    ITxtFPhin
  1073.  
  1074. ITxFStBit:      dc.b    1,0,RP_JAM1,0
  1075.                 dc.w    325
  1076.                 dc.w    39
  1077.                 dc.l    RegFntTA
  1078.                 dc.l    textstbit
  1079.                 dc.l    ITxFxnzvc
  1080.  
  1081. ITxtSPhin:      dc.b    0,0,RP_JAM1,0
  1082.                 dc.w    298
  1083.                 dc.w    63
  1084.                 dc.l    RegFntTA
  1085.                 dc.l    textphin
  1086.                 dc.l    ITxFStBit
  1087.  
  1088. ITxSxnzvc:      dc.b    0,0,RP_JAM1,0
  1089.                 dc.w    397
  1090.                 dc.w    49
  1091.                 dc.l    RegFntTA
  1092.                 dc.l    textxnzvc
  1093.                 dc.l    ITxtSPhin
  1094.  
  1095. ITxSStBit:      dc.b    0,0,RP_JAM1,0
  1096.                 dc.w    327
  1097.                 dc.w    40
  1098.                 dc.l    RegFntTA
  1099.                 dc.l    textstbit
  1100.                 dc.l    ITxSxnzvc
  1101. * 60
  1102.  
  1103. *       The IText structures for the About requester - foreground col
  1104.  
  1105.  
  1106. ITxFShr3:       dc.b    0,0,RP_JAM1,0
  1107.                 dc.w    49
  1108.                 dc.w    49
  1109.                 dc.l    RegFntTA
  1110.                 dc.l    aboutlin6
  1111.                 dc.l    0
  1112.  
  1113. ITxFShr2:       dc.b    0,0,RP_JAM1,0
  1114.                 dc.w    43
  1115.                 dc.w    40
  1116.                 dc.l    RegFntTA
  1117.                 dc.l    aboutlin5
  1118.                 dc.l    ITxFShr3
  1119.  
  1120. ITxFShr1:       dc.b    0,0,RP_JAM1,0
  1121.                 dc.w    19
  1122.                 dc.w    31
  1123.                 dc.l    RegFntTA
  1124.                 dc.l    aboutlin4
  1125.                 dc.l    ITxFShr2
  1126.  
  1127. ITxFAdr3:       dc.b    1,0,RP_JAM1,0
  1128.                 dc.w    272
  1129.                 dc.w    21
  1130.                 dc.l    RegFntTA
  1131.                 dc.l    aboutlin3
  1132.                 dc.l    ITxFShr1
  1133.  
  1134. ITxFAdr2:       dc.b    1,0,RP_JAM1,0
  1135.                 dc.w    272
  1136.                 dc.w    12
  1137.                 dc.l    RegFntTA
  1138.                 dc.l    aboutlin2
  1139.                 dc.l    ITxFAdr3
  1140.  
  1141. ITxFCpyRt:      dc.b    1,0,RP_JAM1,0
  1142.                 dc.w    47                  it_LeftEdge
  1143.                 dc.w    2                   it_TopEdge
  1144.                 dc.l    RegFntTA
  1145.                 dc.l    aboutlin1
  1146.                 dc.l    ITxFAdr2
  1147.  
  1148. ITEnd:          dc.w    0
  1149.                 even
  1150.  
  1151. ITextbytes:     equ     ITEnd-ITxtLng
  1152. IsLen:          equ     ITEnd-ITxFCpyRt
  1153. nrIs:           equ     ITextbytes/IsLen
  1154.  
  1155.  
  1156. ****************************************************************************
  1157.  
  1158.                 section     fontdata,DATA_C
  1159.  
  1160. ****************************************************************************
  1161. *
  1162. *       Font name:                 smfont.font
  1163. *       Struct name:                    RegFnt
  1164. *       Height:                              7
  1165. *       Characters:                   32 - 127
  1166. *               Courtesy of IncludeFont from the Amiga C Encyclopaedia
  1167.  
  1168.  
  1169. RegFntData:
  1170.     dc.w     $0000,$0200,$0000,$0000,$0000,$0000,$0000,$0000
  1171.     dc.w     $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000
  1172.     dc.w     $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000
  1173.     dc.w     $0000,$0000,$0000,$0000,$0000,$3C00
  1174.     dc.w     $0114,$A799,$8421,$1400,$0001,$6339,$C179,$9E63
  1175.     dc.w     $0001,$011C,$7338,$EE7B,$CE93,$8928,$465C,$6718
  1176.     dc.w     $E946,$3297,$9D07,$1004,$0400,$2038,$1021,$2040
  1177.     dc.w     $0000,$0000,$4000,$0000,$0648,$4000
  1178.     dc.w     $0115,$FA22,$0440,$8840,$0002,$9104,$2342,$0494
  1179.     dc.w     $8842,$7882,$8CA5,$2942,$1091,$0928,$6F52,$94A0
  1180.     dc.w     $4946,$B291,$1081,$2802,$771C,$E621,$DC00,$244F
  1181.     dc.w     $719C,$7738,$E94A,$3297,$8848,$5800
  1182.     dc.w     $0100,$A771,$E040,$94E0,$7804,$9118,$C573,$8863
  1183.     dc.w     $8004,$004C,$BCB9,$097B,$D6F1,$09C8,$56D2,$9718
  1184.     dc.w     $4946,$AC72,$1041,$0000,$94A1,$297A,$5221,$384A
  1185.     dc.w     $CA52,$94B0,$494A,$AC91,$1808,$5000
  1186.     dc.w     $0001,$F2A2,$4040,$8040,$0008,$9120,$2F8A,$4890
  1187.     dc.w     $8002,$7880,$BFA5,$0942,$1291,$0928,$465C,$9484
  1188.     dc.w     $492A,$B214,$1021,$0000,$94A1,$2A21,$D221,$244A
  1189.     dc.w     $CA52,$9408,$492A,$B272,$0848,$5800
  1190.     dc.w     $0100,$AF7D,$C021,$0002,$0090,$613D,$C171,$8863
  1191.     dc.w     $0841,$0108,$84B8,$EE7A,$0E93,$912F,$4650,$7CB8
  1192.     dc.w     $4611,$5267,$9C17,$03E0,$771C,$E720,$5221,$244A
  1193.     dc.w     $C99C,$7438,$4619,$5217,$8648,$4000
  1194.     dc.w     $0000,$0200,$0000,$0002,$0000,$0000,$0000,$0000
  1195.     dc.w     $0080,$0000,$7000,$0000,$0000,$0000,$0000,$0000
  1196.     dc.w     $0000,$0000,$0000,$0000,$0000,$0001,$8002,$0000
  1197.     dc.w     $0010,$1000,$0000,$0060,$0000,$3C00
  1198.  
  1199.  
  1200. *       The location and width of each character:
  1201.  
  1202. RegFntLoc:
  1203.     dc.l     $00000005,$00050005,$000A0005,$000F0005
  1204.     dc.l     $00140005,$00190005,$001E0005,$00230005
  1205.     dc.l     $00280005,$002D0005,$00320005,$00370005
  1206.     dc.l     $003C0005,$00410005,$00460005,$004B0005
  1207.     dc.l     $00500005,$00550005,$005A0005,$005F0005
  1208.     dc.l     $00640005,$00690005,$006E0005,$00730005
  1209.     dc.l     $00780005,$007D0005,$00820005,$00870005
  1210.     dc.l     $008C0005,$00910005,$00960005,$009B0005
  1211.     dc.l     $00A00005,$00A50005,$00AA0005,$00AF0005
  1212.     dc.l     $00B40005,$00B90005,$00BE0005,$00C30005
  1213.     dc.l     $00C80005,$00CD0005,$00D20005,$00D70005
  1214.     dc.l     $00DC0005,$00E10005,$00E60005,$00500005
  1215.     dc.l     $00EB0005,$00F00005,$00F50005,$00FA0005
  1216.     dc.l     $00FF0005,$01040005,$01090005,$010E0005
  1217.     dc.l     $01130005,$01180005,$011D0005,$01220005
  1218.     dc.l     $01270005,$012C0005,$01310005,$01360005
  1219.     dc.l     $013B0005,$01400005,$01450005,$014A0005
  1220.     dc.l     $014F0005,$01540005,$01590005,$015E0005
  1221.     dc.l     $01630005,$01680005,$016D0005,$01720005
  1222.     dc.l     $01770005,$017C0005,$01810005,$01860005
  1223.     dc.l     $018B0005,$01900005,$01950005,$019A0005
  1224.     dc.l     $019F0005,$01A40005,$01A90005,$01AE0005
  1225.     dc.l     $01B30005,$01B80005,$01BD0005,$01C20005
  1226.     dc.l     $01C70005,$01CC0005,$01D10005,$01CC0005
  1227.  
  1228.  
  1229. ****************************************************************************
  1230.  
  1231.                 section     fontstruct,DATA
  1232.  
  1233. ****************************************************************************
  1234. *
  1235. *       The actual TextFont and TextAttr structures
  1236.  
  1237.  
  1238. FntName:    dc.b    'DRegPrc.font',0
  1239.  
  1240. RegFntTA:   dc.l    FntName                     APTR    ta_Name
  1241.             dc.w    7                           UWORD   ta_YSize
  1242.             dc.b    8                           UBYTE   ta_Style
  1243.             dc.b    74                          UBYTE   ta_Flags
  1244.  
  1245. RegFntFont: dc.l    0                           APTR    LN_SUCC
  1246.             dc.l    0                           APTR    LN_PRED
  1247.             dc.b    NT_FONT                     UBYTE   LN_TYPE
  1248.             dc.b    0                           BYTE    LN_PRI
  1249.             dc.l    FntName                     APTR    LN_NAME
  1250.             dc.l    0                           APTR    MN_REPLYPORT
  1251.             dc.w    808                         UWORD   MN_LENGTH
  1252.             dc.w    7                           UWORD   tf_YSize
  1253.             dc.b    8                           UBYTE   tf_Style
  1254.             dc.b    74                          UBYTE   tf_Flags
  1255.             dc.w    5                           UWORD   tf_XSize
  1256.             dc.w    5                           UWORD   tf_Baseline
  1257.             dc.w    1                           UWORD   tf_BoldSmear
  1258.             dc.w    0                           UWORD   tf_Accessors
  1259.             dc.b    32                          UBYTE   tf_LoChar
  1260.             dc.b    127                         UBYTE   tf_HiChar
  1261.             dc.l    RegFntData                  APTR    tf_CharData
  1262.             dc.w    60                          UWORD   tf_Modulo
  1263.             dc.l    RegFntLoc                   APTR    tf_CharLoc
  1264.             dc.l    0                           APTR    tf_CharSpace
  1265.             dc.l    0                           APTR    tf_CharKern
  1266.  
  1267.  
  1268. ****************************************************************************
  1269.  
  1270.  
  1271.  
  1272.  
  1273.